home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software Vault: The Gold Collection
/
Software Vault - The Gold Collection (American Databankers) (1993).ISO
/
cdr28
/
bpt5107.zip
/
PATCH511.BAT
< prev
next >
Wrap
DOS Batch File
|
1993-03-01
|
2KB
|
119 lines
echo off
CLS
echo *** MAKE SURE THAT YOU USE THE ORIGINAL (UNPATCHED) RELEASED VERSION
echo OF THE PRODUCT YOU ARE PATCHING. PATCHING AN ALREADY PATCHED COPY
echo MAY CAUSE UNPREDICTABLE ERRORS.
echo
echo
echo This batch file patches the NETWARE v3.1 BTRIEVE PRODUCTS **ONLY**
echo If you are patching NETWARE v3.0 BTRIEVE PRODUCTS, please use
echo PATCH510.BAT.
echo
IF %1! == ! GOTO PARAM
SET BTR_VER=511
SET BTR_NWV=NetWare_3.1
IF %1 == BTRIEVE GOTO BTRIEVE
IF %1 == btrieve GOTO BTRIEVE
IF %1 == BROUTER GOTO BROUTER
IF %1 == brouter GOTO BROUTER
IF %1 == BREQUEST GOTO BREQUES
IF %1 == brequest GOTO BREQUES
GOTO PARAM
::
:BTRIEVE
::
:: BEGIN BTRIEVE PATCHES
::
:: N L M 3.1
SET BTR_FILE=%1.NLM
SET BTR_ORG=%1.ORG
SET BTR_PAT=BPATNLM.%BTR_VER%
GOTO PATCH
::
:: END BTRIEVE PATCHES
::
:: BEGIN BROUTER PATCHES
::
:BROUTER
::
:: N L M 3.1
SET BTR_FILE=%1.NLM
SET BTR_ORG=%1N.ORG
SET BTR_PAT=BPATRTR.%BTR_VER%
GOTO PATCH
::
:: END BROUTER PATCHES
::
:: BEGIN BREQUEST PATCHES
::
:BREQUES
::
:: N L M 3.1
SET BTR_FILE=%1.EXE
SET BTR_ORG=%1.ORG
SET BTR_PAT=BPATREQ.%BTR_VER%
GOTO PATCH
::
:: END BREQUEST PATCHES
::
:: BEGIN PATCHING FILES
::
:PATCH
IF NOT EXIST PI.EXE GOTO NOPI
IF NOT EXIST %BTR_PAT% GOTO NOPAT
IF NOT EXIST %BTR_FILE% GOTO NOFILE
IF NOT EXIST %BTR_ORG% REN %BTR_FILE% %BTR_ORG%
IF EXIST %BTR_FILE% DEL %BTR_FILE%
:INPATCH
echo
echo %BTR_NWV% %BTR_FILE% VERSION %BTR_VER% ** PATCHING ..........
echo
COPY %BTR_ORG% %1
PI %1 %BTR_PAT%
REN %1 %BTR_FILE%
GOTO FIXDONE
::
:NOPAT
echo
echo CANNOT FIND %BTR_PAT%
GOTO END
::
:NOPI
echo
echo CANNOT FIND PI.EXE
echo
echo The Novell Patch Install Utility (PI.EXE) is required to install
echo the patches for this product. Please copy PI.EXE to the directory
echo you are working in............................................
GOTO END
::
:NOFILE
IF EXIST %BTR_ORG% GOTO INPATCH
echo
echo CANNOT FIND %BTR_FILE%
GOTO END
::
::
:PARAM
echo THE FORMAT IS:
echo
echo PATCH511 [filename]
echo
echo WHERE [filename] IS: BTRIEVE
echo BROUTER
echo BREQUEST
echo
GOTO END
::
:FIXDONE
echo
echo BTRIEVE PRODUCT VERSION %BTR_VER% ** PATCH COMPLETE **
echo
::
:END
SET BTR_FILE=
SET BTR_ORG=
SET BTR_PAT=
SET BTR_VER=
SET BTR_NWV=